home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
PROGRAMM
/
BASIC
/
2620B.ZIP
/
FNDFIL.ZIP
/
README
< prev
Wrap
Text File
|
1990-02-19
|
633b
|
23 lines
FindFile.PBU was compiled in the IDE using the options that are in the
FindFile.BAS source code.
FF.BAS is a demo that can show a directory of files in the current
directory.
Compile the program and run it. When the demo asks for "File mask", input
the filename you want, or wild cards such as *.* or *.bas or p??d.* .
Find File consists of two Functions.
FINDFIRST
FINDNEXT
FindFirst must always be called first.
a$=FindFirst$(mask$)
and if it is other than nul, then get FindNext until it returns a nul
DO
a$=FindNext$
if a$="" then exit loop
print a$
LOOP